(nntp-possibly-change-group): Allow for unexpected

responses to GROUP command, since this may be called from a timer
with quit inhibited.

diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index 4067d566eb65cd6400ebb5be8cf7885479ceda1d..4a82b036dd7e7d553a9cb7fc6e700432ccc8069a 100644 (file)
--- a/lisp/gnus/nntp.el
+++ b/lisp/gnus/nntp.el
@@ -871,7 +871,9 @@ This function is supposed to be called from `nntp-server-opened-hook'."
          (set-buffer (process-buffer (car entry)))
          (erase-buffer)
          (nntp-send-string (car entry) (concat "GROUP " group))
-         (nntp-wait-for-string "^2.*\n")
+         ;; allow for unexpected responses, since this can be called
+         ;; from a timer with quit inhibited
+         (nntp-wait-for-string "^[245].*\n")
          (setcar (cddr entry) group)
          (erase-buffer))))))